<!--#include file="./top.asp"-->

<%
	dim rs_rpt_art, str_rpt_art
	set rs_rpt_art = server.CreateObject("Adodb.Recordset")
	str_rpt_art = "select * from rpt_art where stu_id = '" & request.QueryString("stu_id") & "'"
	rs_rpt_art.open str_rpt_art, conn, 1, 3
	
	if rs_rpt_art.eof then
		rs_rpt_art.addnew
		rs_rpt_art.fields("stu_id") = request.QueryString("stu_id")
		rs_rpt_art.update
		rs_rpt_art.close
		rs_rpt_art.open str_rpt_art, conn, 1, 3
	end if
	
	for i = 1 to rs_rpt_art.fields.count - 1
		rs_rpt_art.fields(i) = request.Form("rs_rpt_art_" & i)
	next
	rs_rpt_art.update
%>

</body>
</html>
<%
rs_rpt_art.close
set rs_rpt_art = nothing
call CloseConn()
response.Redirect("./rpt_art.asp?stu_id=" & request.QueryString("stu_id"))
%>